home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / FADAL1HS.M3 < prev    next >
Encoding:
Text File  |  1996-04-01  |  4.2 KB  |  161 lines
  1. name Fadal High Speed Format 1 
  2.  
  3. % 00
  4. ! 00
  5. / 00
  6. O >4
  7. N >4
  8. G >2
  9. m >2.>1 M
  10. S >4
  11. H >2
  12. D >2
  13. M >2
  14. T >2
  15. q >2 Q
  16. R ->3.>4
  17. z ->3.>4 Z
  18. E >2
  19. X ->3.>4
  20. Y ->3.>4
  21. Z ->3.>4
  22. I ->3.>4
  23. J ->3.>4
  24. K ->3.>4
  25. F >4.>2
  26. Q ->3.>4
  27. L 22                                       
  28. l 21 L                                 
  29. P >2                                    
  30. ( 00
  31. d >3.>4
  32. e >3.>4
  33. f >3.>4
  34. * 00 ""
  35.  
  36. ModalLetters X Y Z F R                # List of letters that are modal
  37.  
  38. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal
  39.  
  40. Sequence#s N 0 1 1                    # Char, freq, incr & start
  41. First#? N                             # Y or N  'Output 1st sequence no.
  42. Last#? N                              # Y or N  'Output last sequence no.
  43.  
  44. HCode X                               # X or X U  'Horizontal char.
  45. VCode Y                               # Y or Y V  'Vertical char.
  46. Dcode Z                               # Depth char.
  47. FeedCode F                            # Feed rate char.
  48.  
  49. Comment ( )                           # Begin End comment char.
  50.  
  51. Spindle 3 4 5                         # Cw, ccw & stop m codes
  52. Coolant 8 9 7                         # On, Off & Mist m codes
  53. DComp 41 42 40                        # Left, Right & Cancel m codes
  54. LComp 43 49                           # On & Off codes
  55.  
  56. Feed G1                               # Linear move
  57. Rapid G0                              # Rapid positioning word
  58. Cw G2                                 # Circular move clockwise
  59. Ccw G3                                # Circular move counter clockwise
  60.  
  61. Inc/Abs G 91 90                       # Inc & Abs char. & values
  62.  
  63. CtrCode I J                           # I J or R or I J K L
  64. Helical? Y
  65. Spaces? Y                             # Y or N  'Spaces between words
  66.  
  67. Incremental? N                        # Y or N  'Inc or abs output
  68. CtrIncremental? Y                     # Y or N  'Inc or abs I & J
  69. ByQuadrants? N                        # Y or N  'Break arcs at quadrants
  70.  
  71. Subs1st? Y                            # Y or N 'Orders main & sub programs
  72.  
  73. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  74.  
  75. WorkDefault 1                         # Work offset register default
  76.  
  77. Drill                                 # Drilling canned/manual cycle
  78. G81 G99 R[Vclear] z[D] F[FRate] X[H] Y[V]
  79. end cancel
  80.  
  81. Peck                                  # Pecking canned/manual cycle
  82. G83 G99 R[Vclear] z[D] F[FRate] Q[VBite] X[H] Y[V]
  83. end cancel
  84.  
  85. Tap                                   # Tapping canned/manual cycle
  86. G84 G99 R[Vclear] z[D] F[Frate] Q[VBite] X[H] Y[V]
  87. end cancel
  88.  
  89. LTap                                  # Left handed tapping cycle
  90. G74 G99 R[Vclear] z[D] F[Frate] Q[VBite] X[H] Y[V]
  91. end cancel
  92.  
  93. Ream                                  # Reaming canned/manual cycle
  94. G85 G99 R[Vclear] z[D] F[FRate] X[H] Y[V]
  95. end cancel
  96.  
  97. Bore                                  # Boring canned/manual cycle
  98. G86 G99 R[Vclear] z[D] F[FRate] X[H] Y[V]
  99. end cancel
  100.  
  101. Back                                  # Back boring canned/manual cycle
  102. G76 G99 R[Vclear] z[D] F[FRate] Q[Sclear] X[H] Y[V]
  103. end cancel
  104.  
  105. Cancel                                # Cancel a canned/manual cycle
  106. G80
  107. end
  108.  
  109. StartCode                             # Start of the program
  110. %0
  111. End
  112.  
  113. 1stToolChange                         # First tool change
  114. M6 T[Tool] (0 d[ToolRad] e[ToolDiam] f[corner]
  115. G0 G91 S[Speed] M[Direct] X[H] Y[V]
  116. H[Lcomp] M[Cool] Z[D]
  117. End
  118.  
  119. BeginRow
  120. G8 m94.1 P90 q10 R50 R1 R2
  121. End
  122.  
  123. Replace "R50." with "R0+50."
  124. Replace "R1." with "R1+1."
  125. Replace "R2." with "R2+15."
  126.  
  127. EndRow
  128. m95.1
  129. End
  130.  
  131. Infeed                                # Enable cutter comp
  132. G1 G[Side] X[H] Y[V] F[FRate]
  133. end
  134.  
  135. Outfeed                               # Disable cutter comp
  136. G40 X[H] Y[V]
  137. Z[D]
  138. end
  139.  
  140. ToolChange                            # Secondary tool changes
  141. M5 M9
  142. G0 G49 G90 Z0
  143. M6 T[Tool] (0 d[ToolRad] e[ToolDiam] f[corner]
  144. G0 G91 S[Speed] M[Direct] X[H] Y[V]
  145. H[Lcomp] M[Cool] Z[D]
  146. End
  147.  
  148. EndCode                               # End of the program
  149. M5 M9
  150. G0 G49 G90 Z0
  151. E0 X0 Y0
  152. M6 T[Tool1]
  153. M2
  154. %0
  155. End
  156.  
  157. replace "d" with "Tool Radius "
  158. replace "e" with "Diam "
  159. replace "f" with "Corner Rad. "
  160. replace " P" with ""                  
  161.